ARRAY D1(801),D2(901),D3(1011),D4(1123),D5(123),D6(43),D7(13),D8(23);
VARIABLE /R;
	INSTRUMENT REV;
      REV1(R,801,.827,D1);
      REV1(R,901,.805,D2);
      REV1(R,1011,.783,D3);
      REV1(R,1123,.764,D4);
     REV2(U1+U2+U3+U4,123,.7,D5);
     REV2(U5,43,.7,D6);
     REV2(U6,13,.7,D7);
     REV2(U7,23,.7,D8);
<     R←0;OUTA←OUTA+U6;  END;
      R←0;OUTA←OUTA+U8;  END;
INSTRUMENT TOOT;
OSCIL(P4,MAG*P3,F1);R←U1*P6;OUTA←U1*P5;END;
SYNTH(F1);1 1  999;
REVINIT←1;R←0;
<PLAY;TOOT 0 .05 A 1000   1 .2;
<REV 0 1; FINISH;
 PLAY;TOOT 0 .03  A*2 1000 1 .2;
REV 0 4; TOOT .3 .03 FS*2; TOOT .6 .03 D*2;
TOOT .75 .03 CS*4;FINISH;